home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / AppleScript / Additions / GTQ Library 1.2 / Sample Scripts / RequestAttention < prev    next >
Encoding:
Text File  |  1994-05-03  |  303 b   |  9 lines  |  [TEXT/ToyS]
  1. tell application "Finder" to activate
  2. if (request attention sound number 0 timeout 20) = true then
  3.     speak "made it."
  4.     display dialog "made it."
  5. else
  6.     speak "The user did not respond in 20 seconds.  Canceling script..."
  7. end if
  8. if ((front application) = (this application)) then speak "I'm in front now."
  9.